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So Soon? 


Another issue of Apple Assembly Line already? Well, readers 
sent in articles, Bob went on a writing binge, and we've 
managed to gain over a week in our efforts to get AAL back on 
schedule. You should all actually receive this issue during 
the month of June! One side effect of this acceleration is 
that Bill wasn't ready in time with the code to boot DOS 3.3 
from his UniDisk 3.5. It looks like next month for that 
program and article. 


What, Not Yet? 


Osborne/McGraw-Hill reports that their copies of 65816 Assembly 
Language Programming, by Michael Fischer, arrived today (6/3), 
so our orders should be shipped within two weeks. We'll send 
them on to our customers just as soon as they arrive. Simon & 
Schuster has taken over all of Prentice-Hall's titles, so they 
are now the ones we are bugging about Programming the 65816, by 
David Eyes. The latest word from S & S is mid-July. Sigh. 


We understand that there is a 65816 book from Sybex in the 
stores, but the people who have seen it aren't very impressed, 
describing it as a 6502 book with some '816 information gleaned 
from the data sheets but few examples. 


More Disk Utilities 


We are now carrying the highly-regarded disk utility package 
Copy II Plus. This includes disk and file copy programs, 
catalog and file handling utilities tor both DOS and ProDoSs, 
track and sector editing, and much more. List price for all 
this is only $39.95, but we'll have it for just $35 + shipping. 


Using the 65816 Stack Relative Mode........Bob Sander-Cederlor 


The 65802 and 65816 have two new address modes that allow you 
to reach into the stack. The "“offset,S“ mode lets you access 
position relative to the stack pointer, and the “(offset,S) ,yY" 
mode lets you access data indirectly through an address that is 
on the stack. The new address modes are available even when 
the 65802/16 is in the “emulation” mode. 


The hardware adds the value of the offset to the current stack 
pointer to form an effective address. The stack pointer is 
always pointing one address below the end of the stack. Thus, 
an address of “1,S"“ points to the first item on the stack. 


These new modes lead to interesting programming possibilities. 
When you design a subroutine, you have to decide how you are 
going to pass parameters into and out of the Subroutine. 
Usually we try to use the A, X, and Y registers first. Another 
method puts the data or the address of the data after the JSR 
that calls the subroutine. ProDOS MLI calls use this method: 


JSR $BFOO0 
~DA #$Cl,PARMS 


In another method you push data or data addresses on the stack, 
and then call the subroutine. This is the preferred method in 
some computers, but not the 6502. The new modes make this mode 
work nicely in the 65802/16, though. 


I coded up two examples to show how you can use the new modes, 
both message printing subroutines. The calling method requires 
telling the subroutine where to find a variable length message. 
In the first one (lines 1070-1330), I chose to push the address 
of the text on the stack before calling the printing routine. 
In the second example (lines 1340-1640), I used the method of 
storing the message text immediately after the JSR instruction. 


Lines 1070-1110 print out two messages, using the first 
technique. I use the PEA (Push Effective Address) instruction 
to put the address of the first byte of the message text on the 
stack. This instruction pushes first the high byte, then the 
low byte, of the value of the operand. (I think I would prefer 
to have called it "PSH #value", because that is the effect. 
Then the PEI opcode, which pushes two bytes from the direct 
page, could be “PSH zp“. But, nobody asked me.) 


Anyway, let's look at the PRINT.IT subroutine. When the 
Subroutine starts looking at the stack, it looks like this: 


| msg addr lo | 4,S 

| msg addr hi | 3,S 
| 

| ret addr lo | 2,S 


|) SeSS See sSess5 | 
| ret addr hi | 1,8 


| meer ern ae | 
| |<---Stack Pointer 
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S-C Macro Assembler Version 2.0......DOS $100, ProDOS $100, both for $120 
Version 2.0 DOS Upgrade Kit for 1.0/1.1/1.2 ownersS.....cccceccccccseee sO 
ProDOS Upgrade Kit for Version 2.0 DOS OWnerS...cccccccsccvcccccccssee 930 
Source Code of S-C Macro 2.0 (DOS only). .ccccccccvccesceeee additional $100 
Full Screen Editor for S-C Macro (with complete source code)..........$49 
S-C Cross Reference Utility......without source code $20, with source $50 
RAK-Ware DISASM....ccccccccceeeeewWithout source code $30, with source $50 
S-C Word Processor (with complete source COde).....ccccccccsesceseseee QIU 
DP18 Source and OD VOCE ncaa Gia aie Sse S56 bh ew OS lee we wee ee wee a we eee owes SOU 
Double Precision Floating Point for Applesoft (with source code)......$50 
ES-CAPE (Extended S-C Applesoft Program Editor) .......eee 
Including Version 2.0 With Source Code........-.9$50 
ES-CAPE Version 2.0 and Source Code Update (for Registered Owners) ....$30 
Bag of Tricks 2 (Quality Software) ...ccccccccccccccccccccees (949.95) $45 
Copy II Plus (Central Point Software) ..cccccccccccccccccecsee (9392-99) $35 
Applesoft Toolbox Series (Roger Wagner Publishing).....each ($39.95) $36 
all four ($159.80) $140 
MacASM -- Macro Assembler for MacIntosh (Mainstay).......--($150.00) $100 
S-C Documentor (complete commented source code of Applesoft ROMS).....$50 
Cross Assemblers for owners of S-C Macro Assembler.....$32.50 to $50 each 
(Available: 6800/1/2, 6301, 6805, 6809, 68000, 2-80, Z-8, 8048, 
8051, 8085, 1802/4/5, PDP-1l, GI1650/70, others) 
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AAL Quarterly DisSkS.cccccscccccccccccccceese each $15, or any four for $45 
Each disk contains the source code from three issues of AAL, 
saving you lots of typing and testing. 
The quarters are Jan-Mar, Apr-Jun, Jul-Sep, and Oct-Dec. 
(All source code is formatted for S-C Macro Assembler. Other assemblers 
require some effort to convert file type and edit directives.) 


Diskettes (with hub ringS)...cccccccccccsccccceceee package of 20 for $20 * 
Vinyl disk pages, 6"x8.5", hold two disks each.....ccccceeeeeeeee lO for $6 * 
Diskette Mailing Protectors (hold 1 or 2 disks)..........-..40 cents each 
(Cardboard folders designed to fit 6"X9" Envelopes.) or $25 per 100 * 
Envelopes for Diskette MailerS...cccccccccscceccccccccecesse 6 Cents each 


65802 Microprocessor (Western Design Center) ...c.cccccccscceeee( 999) $50 
quikLoader EPROM System (SCRG) .ccccccrccvsccccscscccccccccsesee (91/9) $170 
PROMGRAMER: (SCRG) és o:d:6 5-4 @ eine, 6:5) Sw wees 60 6 4 eevee eee 0 06-4 wine «( 9L49550) $140 
Switch-a-Slot. (SCRE) ss ccwcessceene cides cs esacveseiccsces cee ($179.50) $170 
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“65816/65802 Assembly Language Programming", Fischer........($19.95) $18 
“Programming the 65816", EyeS...cccccvcccccccccscescvevesecee (Saee99) $21 
"Apple //e Reference Manual", Apple Computer.....cccceccceee ($24.95) $23 
"Apple //c Reference Manual“, Apple Computer....cccecccccees ($24.95) $23 
"ProDOS Technical Reference Manual", Apple Computer.........($29.95) $27 
“Now That You Know Apple Assembly Language...", Gilder......($19.95) $18 
“Apple ProDOS: Advanced Features for Programmers", Little..($17.95) $17 
"Inside the Apple //c", Little.ccccccrcscccccecccescesecseses (919.95) $18 
“Inside the Apple //e", Little... cccccccccccvccscvevscccsseees (919.95) $18 
“Apple II+/IIe Troubleshooting & Repair Guide“, Brenner.....($19.95) $18 
“Apple J)[ Circuit Description", Gayler....ccccccevecccvcccee (922.99) $21 
“Understanding the Apple II“, Sather....ccccccccccccccsecesee(S22.95) $21 
"Understanding the Apple //e“, Sather.cccccccccccsccccceesee (924.95) $23 
“Enhancing Your Apple II, vol. 1", Lancaster....cccceseeeeee ($15.95) $15 
“Enhancing Your Apple II, vol. 2", LancaSteLr..ccrcccccccceee ($17.95) $17 
“Assembly Cookbook for the Apple II/IIe", Lancaster.........($21.95) $20 
"Beneath Apple DOS", Worth & LEChHNELr...cccccccccccccscecssee (919.95) $18 
"Beneath Apple ProDOS", Worth & LeEChner....ccccccccccscvecee (919.95) $18 
“Real Time Programming -- Neglected Topics", Foster.......ee- ($9.95) $9 
"Microcomputer GraphicS", MYErS...cccccccccccccccccccsccseee (914.95) $14 
“Assem. Language for Applesoft Programmers", Finley & Myers.($18.95) $18 
“Assembly Lines . the Book", WAQNEE 6s iia sre beni e6 wie so we ee ( SOLO 99) $18 
“AppleVisions", Bishop & GrOSSDEFger....cccccccescevccsesces (939.95) $36 
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* On these items add $2.00 for the first item and 
$.75 for each additional item for US shipping. 
Foreign customers inquire for postage needed. 
Texas residents please add 6 1/8 % sales tax to all orders. 


*** S-C SOFTWARE, P. O. BOX 280300, Dallas, TX 75228 ** 
ake 


t 
(214) 324-2050 eae 
*** Master Card, VISA, Discover and American Express *** 
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The LDA (3,S),Y instruction at line 1240 taxes tne aadress at 
3,S and 4,S (which is the address of the first byte of the 
message) and adds the Y-register to it; then tne LDA opcode 
picks up the message byte. After printing all the messase and 
finding the terminating 00 byte, lines 1290-1320 move the 
return address up two slots higher in the stack (over the top 
of the message address). At the same time, the original copy 
of the return address is removed from the stack. Then a simple 
RTS takes us back to the caller, with a clean stack. 


The second example uses a “message buried in the code” method. 
When PRINT.MSG looks at the stack, only the return address is 
there. The return address points to the third byte of the JSR 
instruction, one byte before the message text. Therefore the 
printing loop in lines 1500-1550 starts with Y=l. Lines 1560- 
1620 add the message length to the return address, so that an 
RTS opcode will return to the caller just past the message. 


hee SSAVE S.TEST 65816 CALLING SEQUENCES 
1020 -OP 65816 
1030 #------- 2 ee one 
1040 # PEA address of message text 
a6 # JSR PRINT.IT 
1060: Sxeesees ooeesee seo Sees eect 
000800- F4 OD 08 ioe T1 PEA MESSAGE. 1 
000803=- 20 29 08 1080 JSR PRINT.IT 
000806- F4 1B 08 1090 PEA ‘ 
000809- 20 29 1100 JSR PRINT. IT 
00080C- 60 1110 RTS 
1120 Sennen wwe nnn nnn nnn nnn eee 
ite MESSAGE. 1 
OOO80D- 8D 1140 HS 8D 
OOOB0E- CD 3 3 
000812= C1 C7 CS A 
000816=- CF 5 120 ~AS -/MESSAGE ONE/ 
000819- 8D 1160 HS 8D.00 
nae MESSAGE. 2 
00081B- 8D 1180 . 8D 


O00824— D4 D7 CF 1190 ~AS -/MESSAGE TWO/ 
000827- 8D 00 1200 8D.00 
1210 Sennen nnn nnn nnn en nnn ene 
1220 PRINT.IT 
000829= AO 00 ‘She LDY re STARTING INDEX 
00082B- B3 0 1240 .1 LDA (3,S),Y NEXT CHARACTER OF MESSAGE 
00082D- FO 0 1Se5 BEQ .2 .-» TERMINATING $00 
Q0082F- 20 ED FD 1260 JSR $FDED PRINT THE CHAR 
0008 32- C8 at INY 
0008 35- 8 1290 .2 PLA MOVE RETURN ADDRESS 
0008 36- 3 02 1300 STA 2,S OVER THE TOP OF THE 
0008 38- 6 1310 PLA MESSAGE ADDRESS, PRUNING 
0008 2 02 1320 STA 2,5 THE STACK 
0008 3B- 6 1 Be RTS 
1200. Seeseewecacewccuteesecek eee reese 
1350 # JSR PRINT.MSG 
1370 : text of message, terminating zero 
1 Ro T2 
00083C- 20 69 08 1320 JSR PRINT.MSG 
00083F- 8D 1400 -HS 8D 
000840- CD C5 D3 D3 
OOOB44- C1 C7 C5 AO 
000848- C1 C6 D4 C5 
OOO8B4C- D2 AO CA D3 
000850- De 1410 ~AS =-/MESSAGE AFTER JSR/ 
0851- 8D 00 1420 ~HS 8D.00 
000853- 20 69 08 1130 JSR PRINT.MSG 
000856- 8D 14 40 -HS 8D 
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ea C1 CE CF D4 
00085B- C8 C5 D2 Ad 
00 7E- CD C5 D3 D3 
00 2 1C7 C Nee 
00 6 - $9D 0 1460 
000868- 60 ats 
1480 
1490 
000869- AO 01 1500 
QO086B- B3 01 1510 
00086D- FO 06 1520 
OOO86F- 20 ED FD 1530 
000872- C8 15 
000873- DO F6 1550 
ate 98 1560 
oon nt 
600874 83 01 1590 
00 - 00 1600 
00 - 02 15 10 
00 - 02 1620 
00 - 6 130 
1640 


It might be instructive 
be code in a plain 6502 


~AS -/ANOTHER MESSAGE/ 
-HS 8D.00 


POINT TO FIRST CHAR 
GET NEXT CHAR 

~o. TERMINATING $00 
PRINT THE CHAR 


e+» ALWAYS 
ADJUST THE RETURN ADDRESS 
BY ADDING THE MESSAGE LENGTH 


THE HIGH BYTE TOO 


RETURN TO CALLER 


to look at how these two examples could 


environment. 


First, we must replace 


the PEA opcodes in lines 1070 and 1090 with the following: 


LDA #MESSAGE 
PHA 
LDA /MESSAGE 
PHA 


Then PRINT.IT would require using temporary memory somewhere or 
writing self-modifying code. 


could work like this: 


00- 
02- 1260 P 
O82F- 68 12 
0830- 85 01 1290 
0832- 68 1300 
08 33- 8 00 1310 
0835- 6 1320 
08 36- BR 03 1330 
0838- 6 1340 
0 2 85 02 1350 
083B=- AO 00 1360 
0S3D- B1 02 1 {8 ot 
Si 58 8 op 1a 
OBA4- C8 1 80 
O845- DO F6 1410 
0847~ 2 00 1420 .2 
0849- 1430 
O84A=- AS 01 1440 
O84C- 4 1450 
O84D- 60 1460 
PRINT.MSG 


self-modifying version: 


1250 eS aah 


~ EQ 
“EQ § 
RETURN .SAVE+1 


RETURN .SAVE 
PNTR+1 : 


PNTR 
Y fe 
ENTE Ia 


$FDED 


00,01 
02,03 


With a pointer in page zero, it 


POP RETURN ADDRESS 


P MESSAGE ADDRESS 


STARTING INDEX 

NEXT CHARACTER OF MESSAGE 
.-» TERMINATING $00 
PRINT THE CHAR 


- + ALWAYS 


E .1 
RETURN .SAVE 


RELOAD RETURN ADDRESS 


RETURN .SAVE+1 


RETURN TO CALLER 


also can be written in pure 6502 code with either 
self-modifying code or a pointer in page zero. 


Here is the 


Continued on page 14 
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Ram Factor 


All the Performance, Speed, and Software 


Compatibility of RamWorks” in a 


hers right Now Applied Engineering offers you a choice. While RamWorks is the dear 
winner for the auxiliary slot in a Ile, RamFactor is the standard for slots 1 through 7. Now 
anyone with an Apple IJ-+, Franklin, or Apple Ile preferring to use slots 1 through 7 can now 
enjoy the speed and performance that until now was only available with RamWorks. 

With RamFactor, you'll be able to instandy add another 256K, 512K, or a full 1 meg on the 
main board and up to 16 meg with additional piggyback card. And since virtually all software 
is automatically compatible with RamFactor, you'll immediately be able to load programs into 
RamFactor for instantaneous access to information. You'll also be able to store more data for 
larger word processing documents, bigger data bases, and expanded spreadsheets. 


Very Compatible RamFactor, no other standard slot card 
All the leading software is already com- comes dose to enhancing AppleWorks so 
patible with RamFactor. Programs like Apple {| much 


Works, Pinpoint, BPI, Managing Your Money, 
Dollars and Sense, SuperCalc 3A, PFS, Mouse- 
Write, MouseDesk, MouseCalc, Sensible 


True 65C816 16 Bit Power 


ReportWorks, Catalyst 3.0 and more. And most powerful 16 bit applications. (I+ 

RamFactor is fully ProDos, DOS 33, Pascal 1.3 65C816 card under development ) 

and CP/M compatible. In fact, no other Program Switcher 

memory card (RamWorks excepted) is more Powerful . ; 

compatible with commercial software. With Rami res ote oma a cates 
‘ memory into multiple work areas 

sed Apidae Power between them. Each work area can contain 

re are other slot 1-7 cards that give different aed differen : 
AppleWorks a larger desktop, but that’s the Dees Be aa ea 


ing systems. Now you can switch from one 
program to another or even switch from 
AppleWorks to DOS 3.3 to CP/M to Pascal to 
ProDos in under a second And with our 


end of their story. But RamFactor is the only 
slot 1-7 card that increases AppleWorks 

internal memory limits, increasing the maxi- 
mum number of lines permitted in the word 


Slot 1 through 7 Card. 


Features: 

e Up to 16 meg total memory, 256K two 1 
meg on main board Up to 16 meg with 
additional memory on piggyback card 

e Fully Apple II] Memory Expansion com 
patible 

e Compatible with Apple Ile, II+ and 
Franklin 

e Battery back-up option allows you to tum 
on your Apple and run your favorite 
programs in less than 1 second! 

e Automatically recognized by ProDos, DOS 
3.3, Pascal and CP/M 


_ e Built-in RamDrive™ software (a tue RAM 


disk not disk caching) 


e Systems are directly bootable from Ram- 


Factor if desired 


| e Built-in linear addressing 16 bit 


CO-processor port 

e Built-in self diagnostic software 

e Automatic expansion with AppleWorks 1.3 
or later 

e Allows Apple II+ and Ie to run your 
AppleWorks without buying additional 
software 


e Accelerates AppleWorks 

e Displays time and date on the AppleWorks 
screen with any ProDos dock 

e Fits any I/O slot except slot 3 


e Fully socketed and user upgradeable 
RamFactor has a built-in 65C816 —— : 
for direct connection to our le 65C816 card | 


e Much, much more 


| RamFactor with 256K 


$239 
RamFactor with 512K $289 
RamFactor with 1 MEG $38S 
| RamFactor with 2-16 MEG CALL | 
| Battery Back-up Option $179 
| 65C816 16 BH Card $159 
Order RamFactor today .. . with 15 day 


money back guarantee and our “no hassle” 
five vear warranty. Cal9 am to 11 pm. 7 
days, or send check or money order to 


RamF Battery back-up option, you can have Applied MasterCard, Visa and 
span in ei iemaaiaot haat permanent storage for up to 20 years. CO.D. welcome. Texas residents add 514% 
speed and eliminating the time required to | Industry Leader | 
aacess the program disk, it will even display RamFactor is from Applied Engineering, 


the time and date on the AppleWorks screen 
with any ProDos dock RamFactor will 
automatically segment large files so they can 
be saved on 5%", 344", and hard disks. All 
this performance is available to anyone with 
an Apple Ie or II+ with an 80 column card 


AG Applied Engineering 
The Apple enhancement experts. 


(214) 241-6060 


P.O. Box 798, Carroliton, TX 75006 


the largest, most well supported manufacturer | 
of Apple peripherals and the inventor of large 

RAM cards for the Apple. With our 5 vear no 
hassle warranty and outstanding technical 
support, you're assured of the most trouble 
free product you can buy. | 
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Fast 16x16 Multiply & Divide in 65802............John Butterill 
Ottowa, Ontario 


Recently I needed a 16-bit multiplication subroutine in my 
65802-enhanced Apple II. Naturally, I needed one that was both 
fast and short. I referred back to the Jan 86 AAL, which 
contained several examples for the 65802. The one named FASTER 
caught my fancy because it seemed a good compromise between 
size and speed. Then I made some changes which I think 
Significantly improve it. 


I noted that when you ROR the low half of the product into the 
multiplier, you get a bit out. This bit remains in the carry. 
If the low-product and the multiplier share the same location, 
then you can ROL in the low-product bit and ROL out the multi- 
plier bit at the same time, instead of loading and LSR-ing the 
multiplier. By not having to load the multiplier, the Accumu- 
lator is free to contain the high half of the product without 

saving and loading it each time around. The result is rather 

more compact, fitting into 35 bytes (FASTER took 42 bytes). 


It is also faster. By my calculations, the best and worst 
cases take 335 and 383 cycles, respectively. This includes the 
JSR to call the subroutine and the RTS to get back. 


At the expense of two more bytes, I can save nine more cycles: 
delete line 1240 and add the following: 


1304 ROR 
1305 ROR A 


This avoids the 17th trip through the loop, whose only purpose 
was to roll-in the final bit of the product. 


By the way, some assemblers use the syntax “ROR A* to rotate 
the contents of the A-register. The S-C Macro Assembler and 
some others use the syntax "ROR" with a blank operand field for 
that mode. Then “ROR A“ means to rotate the contents of the 
variable named “A“, as in my program. To avoid confusion, you 
might want to change the variable names, avoiding the name “A”, 


1000 SSAVE BUTTERILL'S MULTIPLY 
1020 ® 16 BIT MULTIPLY FOR 65802 
1030 # MULTIPLIES A BY B 
10 0 # LEAVES ANSWER IN A & B 
1050 @eeSenceese eee ee oe ees 
00- 1080 A .EQ 0,1 MULTIPLIER, PRODUCT-LO 
02- 1070 & 7EQ 2,3 MULTIPLICAND, PRODUCT-HI 
1090 # TIMING: B=$0000 -- 27 CYCLES 
1100 # A=$0000 -- 335 CYCLES 
1110 ® A=$FFFF -- ; CYCLES 
1120 # (INCLUDING JSR AND RTS 
1140 .OP 65802 
1190 MULT 16 
000800- 18 1160 CLC ENTER FROM 6502 
000801- FB 1179 XCE 
000802- C2 20 1180 REP #$20 
O00804- A5 02 1190 LDA B IF B ZERO 
000806- FO 17 1200 BEQ .90 THEN BY-PASS 
0008U8- C6 02 1210 DEC B 
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OOO80A- AQ 00 00 1220 LDA ##0000 

OOO80D- A2 10 1230 LDX #16 FOR 16 BITS 
OOO80F- 18 12 CLC FOR 17'TH CYCLE 
000810- 6A seen ~10 ROR ROLL OUT PRODUCT BIT 
000811- 66 00 1260 ROR A ROLL IN 'PLIER BIT 
000813- 90 02 ioe BCC .20 

000815- 65 02 1280 ADC 

00 LF CA 1290 .20 DEX 

000818 10 F6 1300 BPL .10 CYCLES 17 TIMES 
0008 1A- 2 02 1310 STA B 

00081C- 3 1320 .30 SEC EXIT TO 6502 

0008 1D- FB 1 Bo XCE 

poet es 0 1340 RTS 

00081F- 85 00 1350 .90 STA A PROCEDURE FOR B=0 
000821- 80 F9 ses ‘ BRA .30 


A 16-bit by 16-bit division seems inherently messier. First, 
the divisor must be shifted left until it is at least greater 
than half the dividend. One can do a fast cycle which shifts 
the divisor all the way to the left, but for every shift left 
in this loop, the divisor must be shifted right again in the 

second (subtracting) loop. 


In practice, I feel that the values would not be randomly 
distributed, but would be biased toward smaller values. I'm 
more likely to divide by 7 than by 32973, for example. 
Therefore it is worthwhile putting in the extra code to shift 
left only as far as is necessary. The scaling portion in my 
subroutine, lines 1240-1300, shift the divisor until either bit 
15 = 1 or the divisor equals/exceeds the dividend. 


In the second loop, lines 1310-1400, the shifted divisor is 
repeatedly compared to the dividend. If it is smaller, it is 
subtracted and a l-bit goes into the quotient; otherwise a 
O-bit goes in. The loop stops after it has operated with the 
divisor shifted back to its original position. This is 
ordinary long division, in binary. The comparison-subtraction 
is performed from one to 16 times, depending on the values. 


As I calculate it, the best case (dividend=divisor) takes 82 
cycles. The worst case, which I think would be SFFFF/1, takes 
676 cycles. The time is a function of the number of 
Significant bits in the answer. 


[ John also wrote a nice demonstration driver for his 
subroutines, allowing you to enter two hexadecimal values and 
see the result in hexadecimal. The source code for the demo is 
included on the monthly/quarterly disk. ] 


#SAVE BUTTERILL'S DIVIDE 
#16 BIT DIVIDE WITH REMAINDER 
# DIVIDE B BY A 

® LEAVES QUOTIENT IN B 

" REMAINDER IN A 


N= 
ooo°o 


ew 


SS ESucS 


oVelelololololololo\—) 


CesSseses us eee eee eee eee 
® TIMING: A= Storer -- 2 cycle 
# B> or 7h cycles 
# A= - 2 cycles 

: A=1,B=$FFFF -- 676 cycles 
DIVISOR, REMAINDER 


00- 1 
3 DIVIDEND, QUOTIENT 


02- 


ek ad aed wd aed ond oe ooh ond ed ed oe ot ao a 
ot od ond od om CO) OO 


SwWNh Ow co 
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DIV16 
ENTER FROM 6502 
NATIVE MODE 
A-REG 16 BITS 
START SCALE CNTR 
GET DIVISOR 
. «ZERO DIVISOR 
BMI .30 .»eDIVISOR > $7FFF 

#---SCALE DIVISOR---------------- 
.10 ALIGN A TO LEFT 
UNTIL > B 

OR BIT 15 SET 
& COUNT IN X 


20 STAA SCALED DIVIDEND 
#---START SUBTRACTING------------ 
.30  LDAB GET DIVIDEND 

CLEAR QUOTIENT 
40 REPEATED CONDITIONAL 
SUBTRACTION . 


ROL IN 1 IF SUBT. 
O IF NO SUBT. 


000800- 
000801- 
000802- 
000804 - 
000806- 
000808- 
00080A- 


00080C- 
O0080E- 


WO COo~] ONO 
feoleleL@1elelel[a) 
os 
Q 
in| 


own NO 
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000816=- A 
000818- 6 
0008 1A- 
0008 1C~ 
0008 1E- 
000820- 
000822- 
000824- 
000825- 
000827- 


000829- Fy 
O0032A- FB 
00082B- 60 
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REMAINDER 


RecesescSeseke 


EXIT TO 6502 


STA A 
#---RETURN 
.60 
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GIVE 0,0 ANSWER----- 


t FOR £70 
B DIVISION BY ZERO 


02 - 90 STA 


00082C=- 83 


00082E- F9 


12 BIT, 16 CHANNEL, 
PROGRAMMABLE GAIN A/D 
All new 1964 design incorporates the 
latest in state-of-art ILC. technologies. 
Complete 12 bit A/D converter, with an 
accuracy of 0.02%! 


16 single ended channels (single ended 
means that your signals are measured 
against the Apple’s GND.) or 8 
differential channels. Most ail the 
signals you will measure are single 
ended. 

9 software programmable full scale 
ranges, any of the 16 channels can have 
any range at any time. Under program 
control, you can select any of the 
following ranges: +10 volts, +5V, 
+2.5V, +1.0V, + SOOMV, +250MV, 

+ 1OOMV, + SOMV. or + 25MV. 

Very fast conversion (25 micro seconds). 
Analog input resistance greater than 
1,000,000 ohms. 

Laser-trimmed scaling resistors. 

Low power consumption through the 
use of CMOS devices. 

The user connector has +12 and -12 
volts on it so you can power your 
sensors. 

Only elementary programming is 
required to use the A/D. 

@ The entire system is on one standard 
size plug in card that fits neatly inside 
the Apple. 

@ System includes sample programs on 


Uae. PRICE $319 
A few applications may include the moni- 
toring of @ flow @ temperature @ humidi- 
ty @ wind speed @ wind direction @ light 
intensity @ pressure @ RPM @ soil mois- 
ture and many more. 


ek ceed ed ck eed ced ed ed ce ch ed ed ed cet eth cet ce ed cD et cd ce ek ceed eh eed ed ed eth ek ed ed od oe od 


SEEPS Sele mhwwwwwww 


& 


A/D & D/A 
A/D & D/A Features: 
Single PC card 
8 channels A/D 
8 channels D/A 
Superfast conversion time 
Very easy programming 
Many analog ranges 
Manual contains sample applications 


A/D SPECIFICATIONS 
0.3% accuracy 
On-board memory 
Fast conversion (.078 MS per channel) 
A/D process totally transparent to 
Apple (looks like memory) 
User programmable input ranges are 
0 to 10 volts, 0 to 5, ~5 to +5, -2.5 
to +2.5, -5 ta 0, -10 to 0. 
The A/D process takes place on a continuous, 
channel sequencing basis. Data is automatic- 
ally transferred to its proper tocation in the 
on-board RAM. No A/D converter could be 
easier to use. 


D/A SPECIFICATIONS 

0.3% accuracy 

On-board memory 

On-board output buffer amps can 

drive 5 MA 

D/A process is totally transparent to 

the Apple (just poke the data) 

Fast conversion (003 MS per channel) 

User programmable output ranges are 

0 to 5 volts and 0 to 10 volts 
The D/A section contains 8 digital to analog 
converters, with output buffer amplifiers and 
all interface fogic on a single card. On-card 
latches are provided for each of the eight 
D/A converters. No D/A converter could be 
easier to use. The on-board amplifiers are 
laser-trimmed during manufacture, thereby 
eliminating any requirement for off-set 


nulling. PRICE $199 


BRA .60 


SIGNAL CONDITIONER 


Our 8 channel signal conditioner is designed for use with both our A/D converters. This 
board incorporates 8 F.E.T. op-amps. which allow almost any gain or offset. For example, 
an input signal that varies from 2.00 to 2.15 volts or a signal that varies trom 0 to 50 
mV can easily be converted to 0-10V output for the A/D. 


The signal conditioners outputs are on a high quality 16 pin gold I.C. socket that 
matches the one on the A/D‘s so a simple ribbon cable connects the two. The signal 
conditioner can be powered by your Apple or from an external supply. 


FEATURES 

@ 45” square for standard card cage and 4 mounting holes for standard mounting The 
signal conditioner does not plug into the Apple. it can be located up to % mile away from 
the A/D. 


22 pin.156 spacing edge card input connector (extra connectors are easily available i.e. 
Radio Shack). 


Large bread board area. 
Full detailed schematic included. 


PRICE $79 


1/O 32 


@ Your inputs can be anything from 
high speed logic to simple switches 


Provides 4, 8-Bit programmable I/O 
Ports 


Any of the 4 ports can be pro- 
grammed as an input or an output 
port 


@ All 1/O lines are TTL (0-5 volt) 
compatible 


@ Programming is made very easy by 
powerful on-board firmware 


@ The I/O 32 is your best choice for any 
control application 


The i/O manual includes many programs for inputs and outputs. 


Some applications include: 
Burg’ar alarm, direction sensing, use with relays to Gum on lights, sound buzzers, start 
motors, control tape recorders and printers, use with digital poystick. 


PRICE $89 


, Please see our other tull page ad in this magazine for information on Applied Engineering's Timemaster Clock Card and other products for the Apple. 
Our boards are far superior to most of the Consumer electronics made today. AILLC ‘> ate in high quality sockets with mil-spec. components used throughout P.C. boards are glass epoxy 
with gold contacts. Made in America to be the best in the world. All products Compatible with Apple UW and //e. 


Applied Engineering's products are fully tested with complete documentation and available for immediate delivery. All products are guaranteed with a no hassle three year warranty. 


Texas Residents Add 5% Sales Tax 
Add $10.00 If Outside U.S.A 


Send Check of Money Order tu. 
APPLIED ENGINEERING 
P.O. Box 798 
Carrollton, TX 75006 


Call (214)241-6060 
9am. to11 pm. 7 days a week 
MasterC ard, Visa & C.0.D. Welcome 
No extra charge for credit cards 


Apple Assembly Line.....June, 1986......Copyright (C) S-C SOFTWARE.....Page 9 


The Real Story about DOS and BRUN.........Bob Sander~Cederlof 


I was wrong. Some of you were kind enough to point it out. 
John Butterill sent a letter, and others called (sorry, names 
forgotten). I said, in the January 1986 AAL, that the reason 
BRUNning programs from inside Applesoft programs often did not 
work was the fact that DOS used a JMP rather than a JSR to call 
your program. 


The truth is that DOS does call your program with a JMP, but 
there is still a return address on the stack. The BRUN command 
processor itself was called with a JSR, in a way. At SAI17A 
there is a JSR $A180. The routine at S$A180 jumps to the BRUN 
processor. So when your program finishes it will return to 
SA17D, right after the JSR $A180. From there it goes to $9F83. 


At $9F83, DOS will finally exit from doing the BRUN command. 
If MON C is on, the carriage return from the end of the BRUN 
command will be echoed at this time. This can put you intoa 
loop, however, because the BRUN command re-installed the DOS 
hooks in the input and output vectors. When the DOS hooks are 
installed, any character input or output will enter DOS first. 
Since we are still, in effect, inside DOS, because of the BRUN, 
we get into a loop. DOS is not re-entrant, as John Butterill 
put it. The BRUN command processor does a JSR S$A851, which 
re-~installs the DOS hooks. If your program tries to do any 
character I/O through calls to SFDED (COUT) or SFDOC (RDKEY), 
and you start up your program by BRUNning it from inside an 
Applesoft program, you will get DOS into a loop. Or, even if 
your program does not do any I/O, if MONC is on DOS can still 
get into a loop. 


I still think the easiest way to avoid this problem is to avoid 
using BRUN inside Applesoft programs. Use BLOAD and CALL 
instead. But sometimes you may want to use BRUN, because you 
do not know in advance where the CALL address would be. One 
way to allow I/O inside your own program even though it is to 
be BRUN from inside an Applesoft program is to disconnect or 
bypass the hooks. You could output characters by JSR SFDFO, 
for example. But that would always go to the screen, and you 
may have a printer or an 80-column card or a modem hooked in, 
s0 that isn't a real solution. Another way is to dis-install 
the DOS hooks, by doing a JSR $9EEO or the equivalent. The 
code at S$9EE0O does this: 


LDX #3 

ol LDA $AA53 ,X 
STA $36,X 
DEX 
BPL .1l 
RTS 


This unhooks DOS, but leaves any other I/O devices you have 
connected hooked in. After doing this step, your program can 
freely call COUT or RDKEY without DOS even knowing about it. 
You might also want to store a zero at SAASE, to turn off MONC. 
Your program can terminate then by a JMP $3EA, which will 
restore the DOS hooks. 
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NEW!!! IT INAMAC: $69.00 


This Apple Ii emulator runs DOS 3.3 and PRODOS programs (including 6502 machine language routines) on a 512K 
Macintosh. All Apple |i features are supported such as HI-RES/LO-RES graphics, 40/60 column text screens. 
language card and joystick. Also included: clock, RAM disk, keyboard buffer, on-screen HELP, access to the desk 
accessories and support for 4 logical disk drives. Package includes 2 MAC diskettes (PROGRAM holds emulation, 
communications and utility software, DATA holds DOS 3.3 and PRODOS system masters, including Applesoft and 
Integer BASIC) and | Apple Il diskette (transfer softwere moves disk images to the MAC). 


NEW !1! SCREEN.GEN: $35.00 
Develop HI-RES screens for your Apple Ii on a Macintosh. Don't be limited by MousePaint or other screen 
editors. Use MACPAINT (or any other application) on the MAC to create your Apple Il screen. Then use 
SCREEN.GEN to transfer directly from the MAC to the Apple I! (with SuperSerial card or equivalent). Package 
includes Apple Ii diskette with transfer software plus fully commented SOURCE code. 
NEW !!! MIDI-MAGIC for Apple //c: $49.00 

Compatible with any MIDI equipped music keyboard, synthesizer, organ or piano. Package includes a MIDI-out 
cable (plugs directly into modem port - no modifications required!) and 6-song demo diskette. Large selection of 
digitized QRS player-piano music available for 19.00 per diskette (write for catalog). MIDI-MAGIC compatible 
with Apple Il family using Passport MIDI card (or our own input/output card w/drum sync for only $99.00). 


FONT DOWNLOADER & EDITOR: $39.00 
Turn your printer into a custom typesetter. Downloaded characters remain active while printer is powered. 
Use with any Word Processor program capable of sending ESC and contro! codes to printer. Switch back and 
forth easily between standard and custom fonts. Special printer functions (like expanded, compressed etc.) 
supported. HIRES screen editor lets you create your own characters and special graphics symbols. For Apple Il, 
il+, //e. Specify printer: Apple Dot Matrix, C.ltoh 8S10A (Prowriter), Epson FX 60/100, or OkiData 92/93. 
* The Font Downloeder & Editor for the Apple Imagewriter Printer. For use with Apple Il. 
lit, //e (with SuperSerial card) and the Apple //c (with builtin serial interface). 
# FONT LIBRARY DISKETTE #1: $19.00 contains lots of user-contributed fonts for all printers 
supported by the Font Downloader & Editor. Specify printer with order. 
DISASM 2.2e : $30.00 ($50.00 with SOURCE Code) 
Use this intelligent disassembler to investigate the inner workings of Apple |! machine language programs. 
DISASM converts machine code into meaningful, symbolic source compatible with S-C, LISA, ToolKit and other 
assemblers. Handles dats tables, displaced object code & even provides label substitution. Address-based triple 
cross reference generator included. DISASM is an invaluable machine language learning sid to both novice & 
expert alike. Don Lancaster says DISASM is “absolutely essential” in his ASSEMBLY COOKBOOK. 
The ‘PERFORMER’ CARD: $39.00 ($59.00 with SOURCE Code) 
Converts a ‘dumb’ parallel printer 1/F card into a ‘smart’ one. Command menu eliminates need to remember 
complicated ESC codes. Features include perforation skip, suto page numbering with date & title. includes large 
HIRES graphics & text screen dumps. Specify printer: MX-60 with Graftrax-60, MX-100, MX-80/100 with 
Graftraxplus, NEC 8092A, C.Itoh 8510 (Prowriter), OkiDats S2A/63A with Okigraph & OkiData 92/95. 
‘MIRROR’ ROM: $25.00 ($45.00 with SOURCE Code) 
Communications ROM plugs directly into Novation’s Apple-Cat Modem card. Basic modes: Dumb Terminal, 
Remote Console & Programmable Modem. Festures include: selectable pulse or tone dialing. true dialtone 
detection, sudible ring detect, ring-back, printer buffer, 60 col card & shift key mod support. 
RAM/ROM DEVELOPMENT BOARD: $30.00 
Plugs into any Apple slot. Holds one user-supplied 2Kx8 memory chip (6116 type RAM for program development 
or 2716 EPROM to keep your favorite routines on-line). Maps into $CnOO-CnFF and $CG00-CFFF. 
C-PRINT For The APPLE //c: $69.00 
Connect standard parallel printers to an Apple //c. C-PRINT plugs into the standard Apple //c printer serial 
port and into any printer having a standard 36 pin centronics-type parallel connector. Just plug in and print! 
Unless otherwise specified, all Apple Il diskettes are standard (not copy protected!) 3.3 DOS. 

Avoid a $3.00 handling charge by enclosing full payment with order. VISA/MC and COD phone orders OK. 


RAK-WARE 41 Ralph Road W. Orange NJ 07052 (201) 325-1885 
SCECEECEECEEEEECEEEEECEEEEEEEEEEEEEEEEEEE 
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An alternative that seems to work is to save and restore the 
location where DOS saves the entering stack pointer. This is 
the culprit which causes the crippling loop. At S$9FB6, just 
before returning to whoever entered DOS, the stack pointer gets 
reset to the value it had when DOS was entered. If you enter 
DOS while you are still in DOS, the first value is replaced 
with the second. Then the final return point is lost, and it 
is loop-city. Your program can save and restore $AA59, where 
the stack pointer is kept: 


YOUR. PROGRAM 
LDA $AA59 save DOS stack pointer 
PHA 
LDA #0 turn off MON C 
STA SAASE 


e--doO all your stuff, including I/O 


PLA 
STA $AA59 
RTS 


This method has the advantage that your program can issue its 
own DOS commands by printing them, the way you would from 
Applesoft. For example, the following program will work when 
BRUN from inside Applesoft. 


-OR $1000 

-TF B.SHOW OFF 
DEMONSTRATE 

LDA SAA59 


LDY #0 issue DOS CATALOG command 
el LDA MSG,Y 
JSR SFDED 


CPY #MSGS2Z 

BCC .1 

LDA #0 

STA SAASE "“NOMON C* 


STA SAA59 


MSG ~-HS 8D.84 
~AS -—/CATALOG/ 
~HS 8D 

MSGSZ .EQ *-MSG 


100 PRINT CHR$(4) “MONC“ 
110 PRINT CHR$(4) "BRUN B.SHOW OFF" 
120 PRINT “FINISHED” 


However, that program will not work correctly if you just type 
“BRUN B.SHOW OFF” from the command mode. You will get a syntax 
error after the catalog displays, because the catalog command 
is left in the input buffer incorrectly. Oh well! 


Page 12.....Apple Assembly Line.....June, 1986......Copyright (C) S-C SOFTWARE 


Toggling Between Two ValueS.....cecevccccceeeeeesdan Eugenides 


in the course of my job as Technical Editor for MicroSPARCc, 
Inc. (the publishers of Nibble and Nibble Mac magazines), I am 
often called upon to modify programs that we are going to 
publish to make them compatible with configurations other than 
the one the author originally wrote for. Recently, I had to 
change a program to toggle between Drive 1 and Drive 3, rather 
than Drive ! and Drive 2 as it wasS originally coded. Here is 
the original subroutine which toggled the drive number stored 
in a variable named CD: 


TOGGLE. DRIVE 
LDA CD 
CMP #1 
BEQ .l 
LDA #1 
STA CD 
BNE .2 

sdk INC CD 

2 RTS 

CD -BS l 


This code takes a total of 19 bytes, including the variable CD. 
My task was to exactly replace this routine with one which 
would toggle between 1 and 3 rather than 1 and 2. It had to 
use the same number of bytes, or less. It looks easy enough, 
but I couldn't come up with a solution. All my routines 
required one or two more bytes. I finally took the easy way 
out and patched it with a JMP to a free space near the end of 
the program, and put my code there. It works, but is there a 
Shorter way? 


Bob, you are the best code squeezer around, so I thought I'd 
give the problem to you. You'll undoubtedly come up with some 
sneaky code that does the trick in three bytes or less! 


An Answer for INS ono 62s 6 ae OS Seb SS 6S wR DOD Sander-Cederlof 


I don't know if I am the best code squeezer or not, but I can't 
squeeze it all the way to three bytes! My best attempt is nine 
bytes: 


TOGGLE .DRIVE 
LDA #1 

CD ~-EQ *-1 
EOR #2 
STA CD 
RTS 


In general, you can toggle back and forth between any two 
values by using the EOR instruction. The toggle constant is 
Simply the exclusive-or of the two values. For example, to 
toggle back and forth between the values SAO and $B2, I would 
use "“EOR #$12°. 


My subroutine changes 1 to 3 and 3 to l, aS you requested. 
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However, it is not functionally identical to the original code. 
The original code did not store the variable CD inside an 
immediate-mode LDA, as I did. If that troubles you, simply 
change that line to "LDA CD" and add the line "CD .BS 1” at the 
end. The result takes ten bytes, still well under the limit. 


The original code also always had the side-effect of setting 
Carry status, so you might need to add a “SEC” instruction. I 
doubt it, because the original code woulda be very weird if it 
depended on this side-effect. 


The original code not only changed 3 to 1, but also changed any 
other value not already 1 into 1. This is also probably not a 
necessary feature, because prior code should have made sure 
that we started with a valid drive number. 


I came up with several other approaches to the problem. all of 
which are shorter than the original subroutine: 


TOGGLE .DRIVE 
LSR CD 3 TO 1, OR 1 TO O 
BNE .l IT WAS 3 TO l 
LDA #3 CHANGE 1 TO 3 
STA CD 
ol RTS 


TOGGLE .DRIVE 
CLC 
LDA CD 
ADC #2 1 TO 3, OR 3 TO 5 
AND #3 5 TO l 
RTS 


None of these are particularly tricky or sneaky. In fact. the 
first and shortest one is the most straightforward. What would 
be tricky or sneaky is if the original author depended on the 
hidden side-effects in his subroutine. 


Continued from page 5 


1640 PRINT.MSG 
087B- 68 1650 GET RETURN ADDRESS 
087C- 8D 86 08 1660 STA .1+1 LO-BYTE 
O87F- 68 1670 PLA 
O0880- 8D 87 08 1680 STA .1+2 HI-BYTE 
0883- AO 01 1690 LDY #1 
0885- B9 32 99 1700 .1 LDA $9999,Y ADDRESS FILLED IN 
0888- FO 0 1710 BEQ .2 »«.» TERMINATING $00 
O88A- 20 ED FD 1720 JSR $FDED PRINT THE CHAR 
O88D- C8 ie INY 
O88E- DO F5 1740 BNE .1 ~-. ALWAYS 
0890- 98 1750 .2 TYA ADJUST THE RETURN ADDRESS 
0891- 18 1796 CLC BY ADDING THE MESSAGE LENGTH 
0892- 6D 86 08 1 iy ADC .1+1 
0895- A8 1780 TAY SAVE LO BYTE FOR A WHILE 
0896- AQ 00 1130 LDA #0 THE HIGH BYTE TOO 
0898- 6D 87 08 1800 ADC .1+2 
O89B- 48 1810 PHA 
089C- 2 1820 TYA 
O89D- 48 Ls PHA 
O89E- 60 Aaee : RTS RETURN TO CALLER 
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Using Apple's Protocol Converter..........Bob Sander-Cederlof 


The "Protocol Converter" is a firmware-controlled method of 
turning the //c disk port into a multi-drop peripheral bus able 
to support up to 127 external I/O devices. The bus connects 
devices which have enough intelligence: an "Integrated WOZ 
Machine" (IWM) chip, a 6502-type chip, RAM, and ROM. Data is 
transferred in a serial bit-stream at roughly 250,000 bits per 
second. So far, the only device anyone is building to run on 
the P/C bus is the Unidisk 3.5 from Apple. 


As far as I have been able to determine, Apple's only published 
information about the protocol converter is in the Apple //c 
Technical Reference Manual, pages 114-142. The listing of the 
//c firmware in the same Manual also is informative. A prelim- 
inary document was available to developers, but most of the 
material is now given in the //c manual. Tom Weishaar (“Uncle 
DOS") promises a future article on the P/C in his “Open Apple“ 
newsletter. (By the way, the June issue of “Open Apple“ used 
the term “Smartport" as synonymous with “Protocol Converter".) 


The Apple //e interface card for the UniDisk 3.5 also supports 
a “real" Protocol Converter. The Apple Memory Expansion Card, 
CirTech Flipster, and Applied Engineering RamFactor provide the 
same software interface with most of the features of the 
protocol converter for one I/O device (the memory card itself). 


Apple briefly mentions the Protocol Converter in the Apple 
Memory Expansion Card manual (Appendix B, last paragraph), but 
warns against uSing it. They say “using the assembly-language 
protocol is fairly complicated“. Nevertheless, a significant 
amount of the Apple firmware is used to implement the protocol 
converter features. It appears that someone inside Apple 
intends that the P/C will be included in the firmware of most 
future block-oriented devices. From a software stand-point, it 
could be used regardless of whether the actual hardware used 
the IWM-based bus, a SCSI bus, or no bus at all. 


In order to use the protocol converter firmware, you need first 
to find it. The first step in finding it is to find which slot 
it is in. All of the cards with P/C firmware (so far) are also 
cards which control or emulate disk drives and have firmware 
Supporting the ProDOS device driver protocol. Cards with 
ProDOS device driver firmware can be identified by four bytes: 
$Cs0Ol1 = $20, $Cs03 = $00, $CsO5 = $03, and $Cs07 = $00. The 
first three bytes in that list are the same for all disk drive 
controllers. The zero value at $Cs07 distinguishes it as a 
disk controller with protocol converter firmware. 


The next step is to find the entry point in the firmware for 
protocol converter calls. The byte at SCSFF is the key. That 
byte is the offset in the firmware page for ProDOS calls. If 
SCSFF = $45, for example, ProDOS device driver calls would be 
“JSR $Cs45"*. To get the address of the protocol converter 
entry point, add 3 to the ProDOS entry point. In my example, 
"JSR $Cs48" would enter the protocol converter firmware. The 
actual value will probably be different for each kind of card, 
so you have to use software to find out what it is. 
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RamWorks IT 


The Best Selling, Most Compatible, Most 
Recommended, Most Expandable Card Available. 


64K to 16 MEG! RamWorks II Is Number One. 


I. simple, RamWorks II sells the most Works II even expands the clipboard. 


| industry's only low profile (no slot 1 
because it does the most And auto segments large files so they can | interference) fully decoded memory ex- 
be saved on two or more disks. ~ pansion connector. You can also choose 
The AppleWorks Amplifier. RamWorks II, nothing comes dose to _ non-volatile, power independent expand- 


While RamWorks II is recognized by —_ enhancing AppleWorks so much. 


ers allowing permanent storage for over 


all memory intensive programs, NO | 20 

other expansion card comes close to ~—- | Thee Most Friendly, Most ape . 

offering the multitude of enhancements | Compatible Card Available. | It Even Corrects Mistakes. 
to AppleWorks that RamWorks II does. | Using RamWorks II couldn't be easier If you've got some other RAM card 
Naturally, you’d expect RamWorks II to | because it's compatible with more off | that’s not being recognized by your 


programs, and you want RamWorks I], 
you're in luck Because all you have to 
do is plug the memory chips from your 
current card into the expansion sockets 
on RamWorks II to recapture most of 
your investment 


The Ultimate in RGB Color. 


RGB color is an option on RamWorks 
II and with good reason. Some others 
combine RGB output with their memory 


expand the available desktop, after all | the-shelf software than any other RAM 
Applied Engineering was a year ahead of | card. Popular programs like AppleWorks, 
everyone else including Apple in of- | Pinpoint, Catalyst, MouseDesk, Howard- 
fering more than 55K in AppleWorks and | Soft, FlashCalc, The Spread Sheet, Manag- 
we still provide the largest AppleWorks | ing Your Money, SuperCalc 3a, and 
desktops available. But a larger desktop | MagiCalc to name a few (and all 
is just part of the story. Just look at all the | hardware add on’s like ProFile and Sider 
AppleWorks enhancements that even hard disks). RamWorks II is even com- 
Apple’s own card does not provide and | patible with software written for Apple 
only RamWorks II does. With a 256K or | cards. But unlike other cards, RamWorks 
larger RamWorks IL, all of AppleWorks II plugs into the Ile auxiliary slot 
will automatically load itself into RAM providing our super sharp 80 column cards, but that’s unfair for those who 
dramatically increasing speed by elimi- text in a completely integrated system don’t need RGB and for those that do. 
nating all the time required to access the while leaving expansion slots 1 through Because if you don’t need RGB Applied 
program disk drive. Now switch from 7 available for other peripheral cards. Engineering doesn’t make you buy it, 
word processing to spreadsheet to data- | but if you want RGB output you're in for 
base at the speed of light with no wear | Highest Memory Expansion. 4 nice surprise because the RamWorks IJ 
on disk drives. Applied Engineering has always of- RGB option offers better color graphics 
Only RamWorks II eliminates Apple- fered the largest memory for the Ile and _ plus a more readable 80 column text 
Works’ intemal memory limits, increasing | RamWorks II continues that tradition by _—_ (that blows away any composite color 
the maximum number of records avait | expanding to 1 full MEG on the main monitor). For only $129 it can be added 
able from 1,350 to over 15,000. Only card using standard RAMs, more than __._ to RamWorks II, giving you a razor 
RamWorks II increases the number of most will ever need (1 meg is about 500 | sharp, vivid brilliance that most claim is 
lines permitted in the word processing pages of text)...but if you do ever need __the best they have ever seen. You'll also 


mode from 2,250 to over 15,000. And more, RamWorks II has the widest | appreciate the multiple text colors (oth- 
only RamWorks II (256K or larger) offers | selection of expander cards available. ' ers only have green) that come standard. 
a built-in printer buffer, so you won't Additional 512K, 2 MEG, or multiple 16 | But the RamWorks II RGB option is 
have to wait for your printer to stop MEG cards just snap directly onto more than just the ultimate in color 
before returning to AppleWorks Ram- RamWorks II by plugging into the Output because unlike others, it’s fully 


Page 16.....Apple Assembly Line.....June, 1986......Copyright (C) S-C SOFTWARE 


cr 


e RamDrive™ the ultimate disk emulation 
software induded free 

e Memory is easily partitioned allowing 

| many programs to be in memory at 

| once 

| 
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e Compatible, RGB option featuring ultra 
high resolution color graphics and 
multiple text colors, with cables for 
| both Apple and IBM type monitors 
| © Built-in self diagnostics software 
e Lowest power consumption (patent 

pending) | 
e Takes only one slot (auxiliary) even 

when fully expanded 
| e Software industry standard | 
e Advanced Computer Aided Design 
e Used by Apple Computer, Steve 

Wozniak and virtually all software 

companies 
e Displays date and time on the Apple 

Works screen with any PRO-DOS 

compatible clock 


It's Got It All en ¢ Much, much more! 

e 15 day money back guarantee 

e 5 year hassle free warranty insures 
coverage nO matter where you 
purchase 

e Built-in super sharp 80 column display, 
(with or without RGB) 

e Expandable to 1 MEG on main card 

e Expandable to 16 meg with expander 
card, with NO slot 1 interference 

e Can use 64K or 256K RAMs 
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| compatible with all the Apple anda 
' for RGB output contol, making it more 
compatible with off the-shelf software. 
With its FCC certified design, you can 
use almost any RGB monitor because 
only the new RamWorks II RGB option = 
provides both Apple standard and IBM = 
standard RGB outputs (cables induded). ‘ 

The RGB option plugs into the back of 
RamWorks II with no slot 1 interference 
(works on the original RamWorks, too) 
and remember you can order the RGB 
option with your RamWorks II or add it 
On at a later date. 


True 65C816 16 Bit Power. 
RamWorks II has a built-in 65C816 
CPU port for direct connection to our 
optional 65C816 card. The only one 
capable of linearly addressing more than 


PRR RRR SH BH 


1 meg of memory for power applications | . Powerful linear addressing 16 bit RamWorks Il. The industry standard 
like running the Lotus 1-2-3™ compatible coprocessor port for memory expansion of the Apple Ile. 
program, VIP Professional Our 65C816_ | « Automatic AppleWorks expansion up ORDER YOUR RamWorks II TODAY. 
card does not use another slot but to 3017K desktop 9am to 11 p.m. 7 days, or send check 
replaces the 65C02 yet maintains full 8 e Accelerates AppleWorks or money order to Applied 
bit compatibility. e Built-in AppleWorks printer buffer MasterCard, Visa and C.O.D. welcome. 
e The only large RAM card that’s 100% Texas residents add 5%% sales tax. Add 
Endorsed by the Experts. compatible with all Ile software $10.00 if outside USA 


Steve Wozniak, creator of the Apple 
Computer said “I wanted a memory card 
for my Apple that was fast, easy to use, 

| and very compatible; so I bought 

| RamWorks.” A+ magazine said “Applied 

| Engineering’s RamWorks is a boon to 

| those who must use large files with 

| AppleWorks... like the product so 

' much that I am buying one for my own 

| system.” inCider magazine said “Ram- 

Works II is the most powerful auxiliary 

slot memory card available for your Ile, 

and | rate it four stars...For my mon- 
Applied Engineering's RamWorks 

II is king of the hill” 

Apple experts everywhere are 
impressed by RamWorks II's expand- 
ability, versatility, ease of use, and 
the sheer power and speed that it 
adds to any Ile. With a RamWorks II 
in your Apple, you'll make IBM PC's and | 
ATss look like slowpokes. | 


RGB Option 


Applied Engineering 
P.O. Box 798, Carroliton, TX 75006 
(214) 241-6060 
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A program to find the slot and build the address of the 
protocol converter could look like this: 


peaddr .eq $01,$02 
find.pc lda #0 


sta pcaddr 
ldx #$C7 slot = 7 to 1 step -l 
ol stx pcaddrt+l 
ldy #7 
02 lda (pcaddr),y $Cs07,05,03,01 
cmp pc.sig,y 
beq .3 
dex 
cpx #$cl 
bcs .l try next slot 
sec Signal could not find pc 
rts 
o3 dey 
dey 
bpl .2 
lda (pcaddr),y SCSFF 
adc #2 Carry was set 
sta pcaddr 
rts carry Clear signals pc found 


pe.sig .HS FF.20.FF.00.FF.03.FF.00 


Once you have the address of the protocol converter firmware, 
you call it in a manner similar to ProDOS MLI calls. You must 
plug the address of the protocol converter entry into a "JSR" 
instruction, which is followed by a one-byte command code and a 
two-byte address. The command code is a number from $00 to $09 
which specifies which action you want the protocol converter to 
take. The address is the address of a parameter block, which 
provides additional information for processing the command, or 
a place for the information returned by the command. After the 
protocol converter has finished processing your command, it 
returns control to the next byte after the pointer to the 
parameter block. If carry is clear, there was no error. If 
carry is set, the A-register contains an error code. 


Since my FIND.PC program left the address in two page zero 
locations, we could simply put a JMP opcode ($4C) in front of 
the address to make it into a JMP instruction. Then our calls 
to the protocol converter would look like this: 


callpc .eq $00 (just before pcaddr) 
jsx find.pc 
DCS ... e»e-no pc found 
lda #$4C JMP opcode 
sta callpc 
eee -.-Other code 
jsr callpc 
da #cmd,parameters 
eee eee-more code 


Apple warns programmers NOT to use any page zero locations when 
calling the protocol converter firmware, saying that some page 
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Get TransWarp’. The fastest accelerator you can buy 


for your Apple” Ile, IT, or IT +. 


Computing at warp speed! 

[ts an experience vou shouldnt miss. And with TransWanp. vou 
wont have to. Because TransWarp will run vour software up to 36 
times faster -— leaving other accelerators in the stardust! 

No more vawning while vour Apple™ slowly rearranges text or 
calculates spreadsheets. With 256K of ultra-fast RAM, TransWarp 
speeds up a/f Apple software == including AppleWorks, Supercal¢ 
3a. ele end all educational sofowvare. graphics and games. And 
its compatible with all standard! peripheral cards (such as Ram. 
Works Hand Apple memory cards), Profile and Sider hard disks, 
312" Cnibisks, 80-olumin cards, modems, clock cards, mMouses and 
more! You name it. Trans Warp accelerates it Theres even a lo bit 
upgrade chip avaable should 16 bit software become avatable tor 
the Apple 


‘Lrecommend Applied 
Engineering products 
ubolebeartedly: 


” 


Steve Wozniak, the creator 
of Apple Computer 


An important difference. ; 

TransWarps not the only speedup card on the market. But its 
the only one that accelerates vour Apples main memory, ROM 
and auxiliary memory And with more and more programs 
residing in auxiliary memory, buying anvone elses accelerator 
mitkes less cind less sense ‘TransWarp even works with most 
DALA. devices including the Swyvft'™ card 

Theres one more difference Since TransWarp doesnt use mem: 
ory caching. itaccelerates aff software — and not just Most of it 


A cinch to use. 


Simpl plug TransWarp into any slot in vour Apple IL d+ or THe 
including slot 3 in the He. Instantly vould) be computing at 
speeds vou only dreamed about betore. And should vou ever wish 


to run at normal speed. simply press the ESC kev while turning 
vour Apple on 

Since TransWarp is completely transparent, vou wont need pre: 
boot disks or special software. [ts ata to go right out of 
the package! 
Speed = Productivity 

Imagine the productivity gains vou ll achieve when vour pro- 

Zrams are running over three times faster. TransWarp IS SO Power 
ul. vour Apple will make IBM PCs™ and even ATS™ look like 
slowpokes — whether voure planning taxes. plotting charts or 
plaving games! Take a look ata few of the features that set 
TransWarp apart: 
° 3.6 MHZ 65C02 * Totally transparent operadon 
© 250K of ultra-fast on-board with all software 

RAM * Plugs into anv slot. including 
* Accelerates main avd auxiliary slot 3 on the Apple Lc 

memory * Accelerated 16 bit option 
* Low power consumption tor awailable 

cool operauon 


Satisfaction guaranteed! 

Give your Appie the TransWarp advantage. With our risk-free 15- 
day money back guarantee, vou have nothing to lose but wasted 
time Call today! 

TransWarp Accelerator $279 
16 bit upgrade (may add later) $89 
For fast response: 

Call Applied Engineering. 9 am. to Te p.m. 7 days at ¢214) 
241-6000 MasterCard, VISA and C.O.D. welcome. Teas residents 
atddl 3) s% sales tax. Addl $10.00 if outside U.S.A. 

Or mail check or Money order to Applied Engineering. PO. Box 
798. Carrollton. TX 75006. 


Fu Applied Engineering 


The Apple enbancement experts. 


P O. Box 798, Carroliton, TX 75006 (214) 241-6060 
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zero locations are used by that firmware. They do not say what 
locations they use, but my investigations show that they use 
bytes in the range from $40 to S4F. What they do is push those 
on the stack, put in their own data, and at the end restore the 
Original contents from the stack. They uSe an awful lot of 
stack, up to 35 bytes. (The RamFactor firmware uses no more 
than 17 bytes of stack for protocol converter calls, including 
the two used by your JSR.) If you want be safe rather than 
possibly sorry, you can copy the PCADDR bytes up into your own 
program. You could even plug them into every JSR which calls 
protocol converter. A cleaner way might be like this: 


jsr find.pc 

DCS ee. eee-no pe found 
lda pcaddr 

sta callptl 

lda pcaddr+l 

sta callpct2 

jsx callpc 

eda #cmd,parameters 


Callpc jmp * address filled in 
Description of Protocol Converter Commands 


Apple defines ten commands for the protocol converter firmware. 
These are not necessarily identical in function for all devices 
which use the protocol converter. In fact, Apple's memory card 
uses two of the commands differently than the UniDisk 3.5 does. 
The protocol converter firmware in the RamFactor functions 
exactly the same as that in the Apple Memory Expansion Card. 


The following chart summarizes the ten commands as implemented 
in the Apple Memory Expansion Card and RamFactor firmware. A 
more detailed description of each command follows the chart. I 
am particularly pointing this at the memory cards rather than 
the Unidisk 3.5, because I believe these cards will be more 
popular with hackers like you and me. Furthermore, the Unidisk 
3.5 information is available in the //c manual, but Apple has 
not released this detail for owners of the memory card. 


Parameters: +0 +1 +2 +3 +4 +5 +6 +7 +8 
cmd cnt unit 
PC Status $00 0 bufl bufh code 
RAM Status’ $00 1 bufl bufh code 
Read Block $01 1 bufl bufh blkh blkm blkl 
Write Block $02 1 bufl bufh blkh blkm blkl 


Format $03 
Control $04 0/1 bufl bufh code 
Init $05 0/1 


1 bufl bufh cnth cntl adrh adrm adrl 


Read Bytes $08 
1 bufl bufh cnth cntl adrh adrm adrl 


Write Bytes $09 


bm bm RM We WD WwW Ww 
_— 


Error Codes $01 Command not $00-$05,$08, or $09 
$04 Wrong parameter count 
$11 Invalid Unit Number 
$21 Invalid Status or Control code 
$2D Block Number too large 
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PC Status (cmd $00, unit $00, code $00): reads the status of 
the protocol converter itself into your. buffer. The status of 
a memory card is always 8 bytes, with the first byte = $01 and 
all the others = $00. Also returns with $08 in the X-register 
and $00 in the Y-register. ($0008 is the number of bytes 
stored in your buffer.) This is of value only for compatibi- 
lity with other devices supporting protocol converter firmware. 


RAM Status (cmd $00, unit $01, code $00 or $03): reads the 
status of the memory card into your buffer. Code $00 stores 
four bytes: the first is always SF8, and the other three are 
the number of blocks in the current partition (lo, mid, hi 
Order). (¥,X) will equal ($00,$04) when it is finished, 
showing that four bytes were stored. Code $03 will store 25 
bytes: the first four are the same as code $00 returned; the 
next 17 are the name of the card in “ProDOS Volume Name" format 
(length of name in first byte, ASCII characters of name with 
hi-bit off, padded with blanks); and finally, four zero bytes. 
The card name is “RAMCARD". (Y,X) will return ($00,$19) when 
finished, indicating that 25 bytes were stored. 


Obviously, the Status commands will operate differently ona 
real P/C bus, and the actual details will vary according to the 


device you interrogate. 


Read Block (cmd $01): reads the specified block from the 
memory card. (In RamFactor, the block number is relative, 
inside the currently selected RamFactor partition.) You can 
read a block into a buffer in //e Auxiliary Memory by calling 
the P/C with the RAMWRT soft-switch set to AuxMem. 


Write Block (cmd $02): writes the specified block from your 
buffer into the memory card. (In RamFactor, the block number 
is relative, inside the current RamFactor partition.) If you 
are careful and follow all the rules, you can write a block 
from a buffer in Auxiliary Memory by calling the protocol con- 
verter with the RAMRD soft-switch set to AuxMem. You have to 
put the code that sets the RAMRD switch and calls the protocol 
converter, and its parameter block, in zero-page or stack-page 
motherboard RAM ($0000-Ol1FF), or in the language card RAM area. 
Or, you can have both RAMRD and RAMWRT set for AuxMem and be 
executing a program from within AuxMem. I always have a 
conceptual battle dealing with this kind of bank switching. 


Format (cmd $03): does nothing in a memory card. 


Control (cmd $04): does nothing in a memory card. If the code 
is not $00, you get error code $21. The buffer is never used. 


Init (cmd $05): does nothing in a memory card. 


Open or Close (cmd $06 or $07): cause error code $01 ina 
memory card. These commands only apply to character-oriented 
devices, and memory is a block-oriented device (so says Apple). 
Maybe someday someone will build a peripheral which is 
character-oriented and includes P/C firmware. 


Read Bytes (cmd $08): reads a specified number of bytes 
Starting at a specified memory-card address into your buffer. 
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Viewmaster 80; 
the sharpest 
80 column card 
of them all. 


SUPRTERM 
WIZARD 80 


ces Coe ee 
BS a Oe Le Ge 


Now, get great resolution and 
total software compatibility 


for your Apple IT® or IT+. 


QO" look at the chart will give vou some of the reasons 
theres only one smart choice in 80 column cards for 
your Apple. But the real secret to Viewmaster 805 success is 
something even better: Total compatibility: 

The Viewmaster 80 works with all 80 column applica- 
tions, including DOS 3.3, PRO-DOS, CP/M, Pascal, WordStar, 
Format II, Easywriter, Applewriter I], Supertext 80, Zardax, 
Apple PI, Letter Perfect, GBASE II, Visicalc, Multiplan, and 
hundreds of others. 

And the Viewmaster 80 delivers a super sharp, state-of- 
the-art display with a 7 x 9 character matrix for clear, easily 
readable characters. Here are just.a few of the powerful 
features the Viewmaster 80 delivers for a great price ($139): 


OMNIVISION 


* 80 Characters by 24 lines ¢ Fully compatible with all 
Apple languages and software * Super sharp 7 x9 
character matrix with true descenders * Highest com- 
patibility with existing 80 column software * Power and 
input connector for light pen * Very low power con- 
sumption * High speed (18 MHZ) scroll rate * Upper 
and lower case characters with true descenders, both in- 
verse and normal; all on-screen editing functions are sup- 
ported * User-definable cursor shape * Compatible 
with Apple I, 11+ and He * Five year warranty 


Call to order today, 9 a.m. to 11 p.m. seven days, or 
send check or money order to Applied Engineering. 
MasterCard, VISA and C.O.D. welcome. Texas residents add 
5%% sales tax. Add $10.00 outside U.S.A. 


Fa al Applied Engineering 
P.O. Box 798, Carroliton, TX 75006 
(214) 241-6060 
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The byte count may be as high as SFFFF, but this would 
obviously wreak havoc inside your Apple. No checks are made 
inside the protocol firmware for reasonableness of the buffer 
address or the byte count, so be careful. You would NEVER read 
into a buffer in the I/O address range ($CO0O0-SCFFF). 


The memory-card address may be as high as S7FFFFF. (In 
RamFactor, the address is relative inside the current 
partition.) This corresponds to a total of 8 megabytes, which 
is only half the maximum capacity of a RamFactor card. Apple 
has arbitrarily limited us to this maximum, because they use 
the top bit of the card address to specify whether the buffer 
is in MainMem (bit 23 = 0) or AuxMem (bit 23 =1). (Bit 23 of 
the address is bit 7 of the last byte of the parameter block.) 


Write Bytes (cmd $09): writes a specified number of bytes from 
your buffer starting at a specified memory-card address. The 
details of byte count, buffer location, and memory-card address 
are the same as for the Read Bytes ($08) command. 


The Unidisk 3.5 firmware interprets commands $08 and $09 
differently. Unidisk uses this pair to read and write 
Macintosh disks, which have 524-byte blocks. 


All of the RamFactor protocol converter commands operate within 
the current active partition. In the Apple card there is only 
One partition (the whole card). RamFactor has nine partitions, 
and you are always in one of them. If you start with a blank 
card, the first call to the RamFactor protocol converter will 
set up the first partition with all but 1024 bytes, make that 
partition the current active one, and empty all the others. 


Bill Morgan's articles on interfacing the Unidisk 3.5 with DOS 
3.3 illustrate the use of protocol converter calls with that 
device. The real power of the protocol converter concept will 
not be realized until a variety of devices are available which 
use it. Maybe its real future is bound up in the new 
65816-based Apple //. 


RAMWORKS" 


ACCEPT NO SUBSTITUTES. 
BECAUSE THERE AREN’T ANY. 


Thee only one card like RamWorks. We've got the best hardware 
design. We supply the best software and we've got the best support from 
software companies. 


If someone tempts you with an imitation, please get both sides of the 
story. You'll discover why RamWorks offers the best enhancements to 
AppleWorks and other programs, and at the lowest price. 


GUARANTEED! 


214-241-6060 AK 


“We Set the Standard” 
9 AM - 11 PM APPLIED ENGINEERING 
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Generalized MLI System Error Handling.....Bob Sander-Cederlof 


The ProDOS Machine Language Interface (MLI) returns an error 
code in the A-register if anything goesS wrong. There are about 
30 error codes, with values from $01 to S$5A. BASIC.SYSTEM 
reduces the number of different error codes to 18, calling many 
of them simply “I/O ERROR". A nearly complete description of 
the error codes can be found in several references: 


"Apple ProDOS--Advanced Features“, pages 68-70. 
“Beneath Apple ProDOS", pages 6-59 thru 6-6l. 
“ProDOS Technical Reference Manual", pages 77-79. 


When I am working with a new program which has a lot of MLI 
calls, it is helpful to have one central error handler to print 
out the error information. Gary Little gives us such a 
Subroutine on pages 66 and 67 of his “Apple ProDOS -- Advanced 
Features." Gary's program prints the message "MLI ERROR $xx 
OCCURRED AT LOCATION Syyyy", where xx is the hexadecimal error 
code and yyyy is the address of the next byte after the MLI 
call. You can mentally subtract 6 from the yyyy address to get 
the actual address of the JSR S$BFO0O that caused the error. 


I assume you already know, if you are following me this far, 
that MLI calls take the form “JSR SBFO0O", followed by three 
data bytes. The first data byte is the opcode, and the other 
two are the address of the parameter block for the MLI call: 


JSR SBFOO 
~-DA #OPCODE, PARAMETERS 


It would be nice if the general error handler would give us a 
little more information. First, I would like for it to print 
out the actual address of the JSR SBFOO, rather than the return 
address. Second, I would like for it to print out the three 
bytes which follow the JSR SBFOO. 


First, I recoded Gary's routine so that it took a lot less 
Space. (Littler than Little's!) I shortened the message and 
tightened the code. My version prints simply “AT“ in place of 
“OCCURRED AT LOCATION.“ Then I used a message printing 
subroutine to print the two text strings, rather than the two 
Separate loops he used. His took 83 bytes, mine only 56. 


me ee Das, 
eee. 


1010 @#------------~-------------- === 
BF9C- 1838 GMDADR -EQ $BF9C 
F941- ORD PRNTAX .EQ Feat 
FD8E- 1090 CROUT .EQ 8E 
FDDA- 1060 PRBYTE .EQ $FDDA 
FDED- O79 COUT -EQ $FDED 
1090 MLI.ERROR 
O800- 48 1100 PHA SAVE ERROR CODE 
0801= AO 00 1110 LDY #QERR 
seas ge O° 1139 peg PRASS 
O807- 20 DA FD 1480 JSR PRBYTE 
O80A=- AO OD 1150 LDY #QAT 
O80C=- 20 1F 08 1160 JSR PRMSG 
oes AP 9¢ Br 1169 LBE papa” 
0815- 20 41 F9 1190 JSR PRNTAX 
0818- 4C 8E FD 1200 JMP CROU 
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With 2-80 Plus, 
run CP/M-the 
largest body of 
software in 
existence. 


Now, get two computers in one, 
and all the advantages of both. 


nter the CP/M world with the new Z-80 Plus card from Applied 

Engineering, and introduce your Apple He® or H+ © to the thou- 
sands of CP/M programs. Only the 2-80 Plus comes standard with the 
new 4.0 software, the most advanced system ever for running CP/M 
programs. 

The new 4.0 boasts advanced features like built-in disk emulation for 
popular memory expansion boards, boosting both system speed and 
storage capacity And menu-driven utilities that let you get to work faster. 
The 2-80 Plus also lets you run older CP/M programs — all the way down 
to Version 1.6 (2.2 is the most popular). 

The Z-80 Plus is the only card on the market capable of accessing 
more than 64K in an Apple Ile. If you have an extended 80-column 
card, all 128K is usable. and if vou have RamWorks, up to 1088K 
is available. 

Each 7-80 Plus comes with our CP/M Ram Drive software, enabling 
He owners to use an extended 80-column card or a RamWorks card as a 
high-speed Ram disk which runs CP/M software up to Awerily times faster 
So packages like WordStar and dBASE II run at blinding speed. 

Simply plug the Z-80 Plus into any slot in your Apple You'll get the 
benefits of two computers in one — all at an unbelievably low price 
(only $139!). 


* Fully compatible with ALL CP/M software * Fully compatible with 
most hard disks, including Corvus and the Sider * Fully compatible 
with Microsoft disks (no pre-boot required ) * Specifically designed 
for high speed operation in the Apple Ile (runs just as fast in the 

Apple Il + and Franklin) * Runs WordStar, dBASE II, Turbo Pascal, 
Fortran-80, Peachtree and ALL other CP/M software with mo pre-boot 

* Semi-custem IC. and low parts count allows Z-80 Plus to fly through 
CP/M programs with extremely low power consumption (we use the 
Z-80B ) * Does EVERYTHING other Z-80 boards do, plus Z-80 inter- 
rupts * Five year warranty 


Call to order today, 9 a.m. to 1] p.m. seven days, or send check or 
money order to Applied Engineering. MasterCard, VISA and C.O.D. 
welcome. Texas residents add 516% sales tax. Add $10.00 outside U.S.A. 


Fe Applied Engineering 
P.O. Box 798, Carroltton, TX 75006 
(214) 241-6060 


™ 


Timemaster H.O*; 
the only clock 
_ that displays 
time and date on 
AppleWorks” 
screens and files. 


Now, get all the features of 
all the competition combined! 


ts the smart way to put the time and date on vour Apple 

H+ * or He® Because only the Timemuaster HO. packs ALL 
the features of all the competition combined, including leap 
year, vear (not just in PRO-DOS), month, date, dav of week, 
hours, minutes. seconds and milliseconds. 1s totally PRO-DOS, 
DOS 3.3, PASCAL and CP/M compatible. And of course, it works 
better than any other clock with AppleWorks. 

If vou're using or writing software for other clock cards, 
youre still covered. Because the HO. will amtomatically emu- 
late them. And the Timemaster HO. adds b4 new commands to 
BASIC. The HO. even comes complete with two disks full of 
sample programs, including a computerized appointment 
book, a DOS dating program, interrupt programs, and over 30 
programs that others charge extra for — or don't even offer. 

As 2 low-cost option, you can add true BSR remote control 
to the HO, giving you remote control of up to 16 lights and 
appliances in your home or office. 


° Fully PRO-DOS and DOS 3.3, CP/M and PASCAL. compat: 

ble * Time in hours, minutes, seconds and milliseconds 
(the ONLY PRO-DOS compauble card with millisecond 
capability), date with vear, month, day of week and leap vear 

° 24-Hour military format or 12-hour AM/PM format * Fight 
software controlled interrupts so you can run two programs 
at the same time (many examples included) ° Allows 
AppleWorks to time and date stamp all data automatically 

° The only clock card that displays time and date on the 


AppleWorks screen * Five vear warranty 
Clock price we. $129.00 
BSR option (may be added later)... .. $ 49.00 


Call to order today, 9 a.m. to 1] p.m. seven days, or send 
check or money order to Applied Engineering. MasterCard, 
VISA and C.O.D. welcome. Texas residents add 5%% sales tax. 
Add $10.00 outside U.S.A. 


Fu oa Applied Engineering 
P.O. Box 798, Carroliton, TX 75006 
(214) 241-6060 
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1210 Beanen nnn nn nner n nnn 
081B- 2Q ED FD 1220 MSG1 JSR COUT 
OS 1E- 8 ‘ene INY 
O81F- B9 25 08 1240 PRMSG LDA MSGS,Y 
0822- DO F7 1o20 BNE MSG1 
O824- 60 1260 RTS 
ihe foe nem enn wn nnn nnn nnn nee enan= 
1280 MSGS 
00- 1290 QERR’~ .EQ *-MSGS 
0825- 8D 1300 -HS 8 


O82F- AO A 1310 .AS -/MLI ERROR $/ 
0831- 00 1320 “HS 00 
OD ao ct pa 1230 QaAT  .EQ ®-MSGS 
08 32- 
0835- AO A 1340 .AS -/ AT $/ 
OB37- 00 1360 “HS 00 
1360 #---------~---------------=------ 


Next, I started adding the features I mentioned above. The 
final program takes 92 bytes, which is 9 more than Gary's. It 
displays the error message “MLI ERROR $xx AT Syyyy (op.addr)." 


Lines 1080-1160 pick up the address MLI saved in the System 
Global Page, and sbtract six from it. The result is stored 
into the LDA $9999,Y instruction at line 1200. Horrors! 
Self-modifying code! The loop at lines 1180-1240 copies the 
three data bytes which follow the JSR SBFOO into the three 
variables at lines 1390-1410. 


Lines 1260-1360 print out the error message. This loop 
differentiates between ASCII characters (bit 7 = 1) and data 
offsets (bit 7 = 0). The text to be printed is in lines 1430- 
1550. Note that I used the negative ASCII form for the text, 
and .DA lines for the data bytes which will be printed in hexa- 
decimal. The expressions in those .DA lines compute an offset 
from the beginning of the subroutine, which will come out as a 
value less than $7F. I also used the value 00 to terminate the 
entire message. The $8D bytes are RETURN characters, to make 
sure the error message prints ona line by itself. 


1000 SSAVE MLI. ERROR. PLUS 
BF9C- 1020 CMDADR .EQ $BF9C 
1030) Boose ee ee 
FDDA- 1040 PRBYTE .EQ $FDDA 
FDED- 1050 COUT .EQ $FDED 
1000 Siscede cone] oa eesececece cece seus 
1070 MLI. ERROR. PLUS 
0800- 8D 3B 08 1080 STA ERRCOD SAVE ERROR NUMBER 
0803- AC 9D BF 1090 LDY CMDADR+1 
0806- AD 9C BF 1100 LDA CMDADR SUBTRACT 6 FROM ADDRESS 
0809- 38 1110 SEC 
O80A- £9 06 _—- 1120 SBC #6 
O80C- 8D 1A 08 1130 STA CALADR+1 CALL ADDR LO 
O80F- BO 01 1140 BCS .1 
0811- 88 1150 DEY 
0812- 8C 1B 08 1180 51 STY CALADR+2 CALL ADDR HI 
0815- A002 «1480 LDY #2 
0817- A2 03 —-:1190 LDX #3 COPY OPCODE & PARMS ADDR 
0819- BD 99 99 1200 CALADR LDA $9999,x (ADDRESS FILLED IN) 
081C~ E8 1210 INX 
081D- 99 3C 08 1220 STA PARMADR.H,Y 
0820- 1230 DEY 
0821- 10 F6 12 BPL CALADR ...UNTIL Y=-1 
1250 Wasetcecec sac nenscudecoleeneeaees 
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0823- 30 03 1260 BMI .2 ». ALWAYS 
eee eee | ae 
0829- BO 3F 08 1290 _ LDA QERR,Y 
oo he Cee 
0831- AA 1330 .3 TAX USE AS INDEX 
0832- BD 00 08 13 0 LDA MLI.ERROR. PLUS ,X 
0835- 20 DA FD 1350 JSR PRB 
0838- 4c 28 08 Ft : JMP NEXT CHAR 
08 3B- 1360 ERRCOD BS 1 
083c- 13 O PARMADR.H .BS 1 
083D- 1800 PARMADR.L .BS 1 
08 3E- 1410 OPCODE BS 1 
083F- 8D 1430 QERR .HS 8D 
o840- CD cc C9 
pBNR Sine ce be 
O849- AO AL 14.40 .AS -/MLI ERROR $/ 
084B- 3B 1450 "DA #ERRCOD-MLI. ERROR. PLUS 
Opaee AS kao auGo AS -/ AT $/ 
0851- 1B 1470 “DA #CALADR-MLI. ERROR. PLUS+2 
0852 us a 14 -DA 1 eRReNint 
0855 3E 1560 -DA #OPCODE-MLI. ERROR. PLUS 
0857- 3C 1520 “DA #PARMADR.H-MLI.ERROR.PLUS 
: 58- D 1530 -DA #PARMADR. L-MLI- ERROR. PLUS 
O85A- 8D 00 1590 -HS 8D. 00 

1G60. Siccesenc ee on ao eee ose ce 


SO a an 


NEW FROM 
DON LANCASTER 


HANDS-ON BOOKS UNLOCKED & SOFTWARE 


Apple Assembly Cookbook 21.50 Absolute Reset lle & llc 19.50 
All About Applewriter 12.50  Applewriter Toolkit (Dos 3.3e) 39.50 
Applewriter Cookbook 19.50  Applewriter Toolkit (ProDOS) 39.50 
Enhancing your Apple voi | 15.50 Both Applewriter Toolkits 59.50 
Enhancing your Apple vol Il 15.50  Applewriter/Laserwriter Utilities 39.50 
Micro Cookbook vol | 15.50  Laserwriter Demo Pack FREE 
Micro Cookbook vol Il 15.50  Appleworks Disassembly Script 49.50 
CMOS Cookbook 14.50 Enhance vol | Companion Disk 19.50 


TTL Cookbook 12.50 Enhance vol ll Companion Disk 19.50 
TV Typewriter Cookbook 12.50 Assembly CB Companion Disk 19.50 
Active Filter Cookbook 14.50 Applewriter CB Companion Disk 19.50 
Incredible Secret Money Machine 7.50 Classic Cell Animation Demo 12.50 


FREE VOICE HELPLINE VISA/MC 


SYNERGETICS 
Box 809-SC 
Thatcher, AZ 85552 
(602) 428-4073 
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1200 BAUD MODEMS 


Coit Valley Computers has two modems for your every need. Both are top quality state-of-the-art 1200/300/1 10 baud Hayes™ compatible 
modems; which means your computer can send & receive data at lightning fast speeds! And automatically switch between 1200 and 300 
baud to communicate with slower Apples. Since neither comes with software, we carry Ascii Express ProDOS at a low price of $89. 


AVATEX™ 1200 EXTERNAL 
STAND-ALONE MODEM 


e 100% plug in Modem for Apple lic or Macintosh with proper 
cable (see below) 
Universal modem that only requires modem compatible serial 
card (or port), & cable, to plug into Apple Ile, Apple li+, or 
iBM 
Auto Answer, Auto Dial, Auto Redial, Auto Disconnect 
Full Bell 212A compatibility 
Automatically switches between 300 baud & 1200 baud in- 
coming speeds 
Complete diagnostics & full complement of LEDS (TR, SD, RD, 
HS, MC, TM, RI) 
DATA/VOICE Button switches from talk to data transmission & 
back again 
FREE Compuserve offer & free access time. One year warranty. 


CERMETEK APPLE-MATE™ 1200 
INTERNAL MODEM 
e Internal 1200 baud modem for Apple ile or Apple li+ 


e Only one card & takes only one slot w/ no external interface or 
power supply 


Built-in Super Serial Card equivalent 

1200/300/110 baud operation and Bell 212A compatibility 
Built-in Speaker & Diagnostics 

Auto Dial, Auto Answer, & Auto Select. Two year warranty. 


2400 BAUD MODEMS — Call 


CABLES REQUIRED WITH AVATEX MODEMS 


Apple llc - Avatex Cable 
Apple lle, Il+ - Avatex Cable 
Macintosh - Avatex Cable 
IBM - Avatex Cable 


OTHER APPLE PERIPHERALS 


lle/ll+ Serial Modem Card 

RGB Monitor for Apple Ile 

RGB Monitor to Apple Cable 
MultiRam RGB cards (facing page) 


With prices this low, how can you afford to be without a 1200 baud modem? 
Just the savings in connect time, will pay for the difference between a 300 & 
1200 baud modem. You can get everything you need from Coit Valley 
Computers. Shipping on modems $5-Ground/$8-Air; monitors $10. See 
terms on facing page. 


Hayes, Avatex, Apple-Mate respective registered trademarks of Hayes Microcomputer Products, E+E 
DataComm, Cermetek Micro. 


COIT VALLEY COMPUTERS « 14055 Waterfall Way, Dallas, TX 75240 © (214) 234-5047 
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Don't buy yesterday's card that doesn't offer battery backed-up 
RAM or 65C81€ new Apple technolosy just because It’s advertised 
a lot! You car Duy Checkmate Technology's State-Of-The-Art 
MULTIRAM RGB RAM CARD” with BATTERY BACKED-UP 
STATIC RAM cptions that can load & save programs (like 
AppleWorks: ‘or 1C years! Itis a FASTER & LESS EXPENSIVE 
REPLACEMENT FOR HARD DISKS. is USER EXPANDABLE 
TO 6 MEGABYTES. compatabie with ail (100%) 3rd party 
software hardware. has anoptional real 16-Bit65C816 slot saver 
Co-Processor card. sharp 80 columns. super Double Hi-Res, & 
BUILT IN RGB*' It's a direct substitute for Ramworks ||" or Apple 
Ext 80 column cards & has an amazing 5 year warranty! Unlike 
Ramworks ll. MultiRam fits ALL (even Euro) Apples, can't interfere 
with slot 1 cards & has no soldered chips! 


MultiRam RGB expands to 1 Meg main RAM + 3 Meg's 
piggyback RAM + 2 Meg's BATTERY BACKED-UP RAM. Multi- 
Ram ile expands to 768k & can piggyback w/ MultiRam RGB. A 
POSSIBLE 6 MEGABYTES IN ONE SLOT - MORE THAN 
RAMWORKS II & Flipster™. 


FREE APPLEWORKS EXPANDER SOFTWARE that loads ALL 
(even printer routines or PARTS of AppleWorks, runs 30 x faster, 
increased Desktop over 2048k, auto-segments large files onto 
multiple disks, stores over 23,000 records! FREE APPLEWORKS 
TIME/DAY/DATE ON-SCREEN, AUTO-COPY TO RAM, ULTRA- 
FAST PRODOS/DOS3.3RAMDISK & RAMTEST, optional CP/M 
& Pascal Ram disk! Printer Buffer due anytime. 


256k Memory Chips-1 yr warranty (8) 55. 
Apple Ile Enhancement Kit 62. 
Accelerator lle-350% speedup card 222. 
Accelerator lle ~ Pinpoint ispeciali 249. 
Clockworks Card (Thunder Time HC” corp. 89. 
Pico™ Slimline Drive lic. Ile. Il- 158. 
FD-100 Slimline Drive lle. |! — 115. 
Pinpoint Program or Spell Checker iea) 49. 
65C816 EX Co-Processor Card 157. 


RGB Monitors, Connectors & Cables* 


card order (foreign orders/FPO/APO extra). Add 3% for Master- 
Card/Visa (include #/expir) & P.O.'s (3% 7 Net 30). For fast 
delivery send Cashier’s/Certified check, Money Order. C.O.D. 
(add $5) & personal checks accepted (allow 16 days). Tex res 
add 6 2% tax. 


MutiRam Ramworks’/Ramworks {i Timemaster tl HO Z ram Pico Fipster respective trademarks of 
Checkmate Technology Apphed Engineenng. WGE Cintech 


COIT VALLEY COMPUTERS 


GS Meg lie/G4Oklic 


MultiRam MultiRam 

RGB lle 

Card Card 

64k MULTIRAM .... 169. 129. 

128k MULTIRAM .... 179. 139. 

320k MULTIRAM .... 206. 175. 

576k MULTIRAM .... 241. 214. 

832k MULTIRAM .... 266. .... 239. 

1024k MULTIRAM .... 284.6 © ee & 
1344k MULTIRAM .... 449. : 
1600k MULTIRAM .... 484. - 
1792k MULTIRAM .... 519. - 


Terms: Add $4-Ground or $6-Air shipping & phone # toeachU.S. 


Checkmate Technology's State-Of-The-Art lic cards easily 
expand your lic up to 640k, are 100% compatable with ail Hc 
software/hardware, & come with the SAME FREE SOFTWARE 
as MULTIRAM Ile (see above). MULTIRAM C is non-upgradable, 
MULTIRAM CX can be upgraded with areal 65C8 16 kit (unlike Z- 
Ram") to likely run software for the new Apple computer! 


e UNLIKE Z-RAM, THERE ARE NO JUMPER WIRES, CLIPS 
TO ATTACH, SOLDERED CHIPS, OR DRIVE REMOVAL 
REQUIRED FOR INSTALLATION. 

e USES ABOUT 50% LESS POWER than Z-RAM causing less 
power supply strain or battery pack drain! 

¢ 15 DAY MONEY BACK SATISFACTION GUARANTEE, 5 YR 
WARRANTY, & LOWER PRICES - We sell Ilc cards for much 
less & our software updates are FREE & AUTOMATIC, while 
others charge $10 or more! 


OUR LOWEST PRICE 
EEE ae 
256k MULTIRAMC .............. 159. 
512k MULTIRAMC .............. 189. 
256k MULTIRAM CX ............. 189. 
512k MULTIRAM CX ............. 237. 


65C816 CX Kit ($10 less w/ card) 129. 
VIP Professional w/ any 65C816 117. 
1200 Baud lic Modem w/cable .......... 221. 
CP/M & Pascal Ram Disk Ile/Ilc (ea) ........ 20. 


WHY BUY FROM COIT VALLEY COMPUTERS RATHER 
THAN SOME MAIL ORDER HOUSES? Only we offer an exclu- 
sive 15 day money back satisfaction guarantee, double software, 
more support, free automatic software updates, free 64k with 
each 256k/512k/768k lle card. We know the products well, & we 
have them in stock. CALL FOR DETAILS, CURRENT PRICES, 
QUANTITY DISCOUNTS, OR NEW FEATURES! SCHOOLS & 


GROUPS WELCOME. 
ORDER FORM 
(214) 234-5047 


COIT VALLEY COMPUTERS 
14055 Waterfall Way Dallas, Texas 75240 


NAME 


ADDRESS __. 


GUNG pies. 


PHONE ! ___} 


SHIPPING 
TOTAL 


MC/VISA ___ 
EXP 


14055 Waterfall Way 


(214) 234-5047 


Dallas, Texas 75240 
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Practical Application Of CRC....-cccceccccceeeeeeDON Rinasberg 


When I read Bob S-C's article on CRC in the February 1986 AAL, 
I said, “Very interesting, but who needs it“. Well, it wasn't 
long before I ran into a real need myself! 


I bought a used IBM PC-Jr and wanted to put my own routines in 
an auto-start ROM cartridge. After some sleuthing, I found 
that the power-up routine checks for signature bytes. If they 
are present, the routine checks the ROM's CRC, which must be 
$0000 or the machine locks up. 


Not knowing the 65802 opcodes that Bob used, and being quite 
familiar with the 8088 language, I decided to translate the 
PC-Jr's CRC routine from "8088 dis-assembly language" to “plain 
vanilla 6502-ese"“. I simulated the 8088's registers with Apple 
RAM, and wrote subroutines for some of the 16-bit 8088 
instructions. 


Now here's what I think is strange about CRC's. If you pass 
all bytes of a set of data through the CRC generator and then 
the two CRC bytes themselves, the total CRC result is $0000! 
The PC-Jr add-on ROMs have the program in all except the last 
two bytes and the CRC of the program in those last two, so the 
total CRC for the entire ROM is $0000. 


My 6502 code requires you to enter the start in Apple RAM and 
the length of the ROM data. For example, for a program 
Starting at $2000 in Apple RAM, destined to be blown into a 
2716 EPROM (2048 bytes), you would enter an address of $2000 
and a length of $0800. These two values go into the first four 
bytes of the Apple zero page, so you can use a monitor 
instruction from inside the S-C Assembler like this: 


:$00:00 20 00 08 


My program runs a CRC calculation on all but the last two 
bytes, and then prints out what the resulting CRC code is. If 
you store the CRC value in the last two bytes of the ROM image, 
add two to the length, and re-run my program, the result should 
be 0000. In a particular example with a 2716, it might look 
like this: 


:$00:00 20 00 08 (set up address & length ) 
:$800G (run CRC calculation ) 
82DF (value of CRC computed ) 
:S20FE:82 DF (store CRC in EPROM image) 
:$02:02 (increase length by two ) 
:$800G (run CRC calcualtion ) 
0000 (it worked! ) 


My routines will not win the speed or elegance contests, but 
they give me the data! 


If you want another check on your coding, run a CRC calculation 
on the Applesoft $D000 ROM with length $0800. You shoula get 
SDO1E if you have an Apple II+ or original //e version. The 
enhanced //e gives a CRC of $3BD4 because of some small changes 
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Apple made. 


By the way, I use my Apple to generate assembly language code 
for the IBM PC line. I created an 8086/8088 cross assembler 
based on the S-C Assembler for the purpose. Contact me if you 
need a tool like this: Don Rindsberg, The Bit Stop, 5958 S. 
Shenandoah, Mobile, Alabama 36608. Or call at (205) 342-1653. 


1900 #SAVE ROM CRC CALCULATION 
00- 1020 LOCN .EQ $00,01 ENTER DATA LOCN (L/H) 
02- 1030 SIZE .EQ $02,03 ENTER ROM SIZE (L/H) 
O4- 1040 AL .EQ $04 SIMULATED 8088 REGISTERS 
05- 1050 AH SEQ $05 
06- 1060 BL .EQ $06 
07- 1070 BH .EQ $0 
08- 1080 CL .EQ $0 
09- 1090 CH ~EQ $09 
OA- 1100 DL .EQ $0A 
OB- 1110 DH .EQ $0B 
oc- 1120 PTR .EQ $0C,0D WORK POINTER 
OR- 1130 CTR -EQ $0E,0F BYTE COUNTER 
F941- 1150 PRNTAX .EQ $F941 
1170 .OR $300 
1100 @eseet eee eee cece cee es 
0300- A5 00 1190 START LDA LOCN SETUP POINTER 
0302- 85 0C 1200 STA PTR TO ROM IMAGE 
O304- A5 01 1210 LDA LOCN+1 
0306- 85 OD 1220 : STA PTR+1 
0308- 38 1380 SEC GET BYTE COUNT - 2 
0309- AS5 02 1250 LDA SIZE 
cia ce 
ci an ne a 
0313- 85 OF 1300 : STA CTR+1 
0315- AO FF 1320 LDY #$FF START CRC AT $FFFF 
0317- 84 OA 1 30 STY D 
ct ant ne ce 
031C- 84 05 1300 : STY AH INIT AH REG 
031E- B1 OC 1380 .1 LDA (PTR),Y GET NEXT BYTE 
0320- 20 3E 03 1390 JSR FOLD.BYTE.INTO.CRC 
0 23 E6 OC 1400 INC PTR BUMP THE WORK POINTER 
pasey Be be lade PNG PTRe1 
- + 
0329- AS OE 1430 2 LDA cTR DECREMENT THE BYTE COUNT 
ee ee | ee 
0331- AD OE 1470 : LDA CIR TEST IF FINISHED 
- + 
0338 DO E7 14.90 BNE .1 ...KEEP GOING 
0337- AG OA 1300 LDX DL DISPLAY THE RESULT 
033B- 4C 41 F9 1520 . JMP PRNTAX 
io FOLD.BYTE. INTO.CRC 
033E- 45 OB 1550 OR DH 
ca ae ee 
O344- 20 6 3 1260 JSR ROLAX4 8088 "ROL AX,C" 
0347- 20 98 03 1590 JSR EORAD 8088 "EOR DX, AX" 
O34A- 20 7 03 1600 JSR ROLAX1 8088 "ROL AX, 1" 
O34D- A5 1610 LDA DH SWAP BYTES IN REG-D 
O34F- A6 OA 1620 LDX DL 
gol ae ee a 
p32e- 52 98 03 1948 JSR EORAD 8088 "EOR DX, AX" 
0358- 20 83 03 1660 JSR RORAX4 8088 "ROR AX,C" 
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035B- A5 04 Lai LDA AL 
See 2 BP egg NR fea 
0361- 20 98 03 1700 JSR EQRAD 8088 "EOR DX, AX" 
o361- 20 45 03 {20 ey ‘ages 8088 "ROR Ax, 1" 
0 g- fe 0 1 Be EOR DH 
036B- 85 OB 1740 STA DH 
036D- 60 1728 P RTS 
179 # SIMULATE 8088 "ROL AX,C*" 
036E- 20 77 0 1730 ROLAX4S JSR ROLAX1 SHIFT 4 BITS BY SHIFTING 
0371- 20 77 03 1800 JSR ROLAX1 1 BIT 4 TIMES 
O374- 20 77 0 He JSR ROLAX1 
ioe # SIMULATE 8088 "ROL AX,1" 
0377- A5 O4 1850 ROLAX1 LDA AL 8088 "ROL" SHIFTS END AROUND 
Berke 13 05 Ieee fee iti WITHOUT LEAVING A BIT IN CARRY 
037C=- 90 02 1840 BCC .1 6502 DOES LEAVE A BIT IN CARRY, 
O37E- 09 01 1890 ORA #$01 SO LETS MERGE CARRY IN HERE. 
53 O- 85 04 1900 .1 STA AL 
0382- 60 tase ‘ RTS 
1930 # SIMULATE 8088 "ROR AX,C* 
0383- 20 8C 03 1950 RORAX4 JSR RORAX1 SHIFT 4 BITS BY SHIFTING 
0 8 - 20 gC 0 1386 JSR RORAX1 1 BIT 4 TIMES 
0389- 20 0 180 JSR RORAX1 
sabe # SIMULATE 8088 "ROR AX,1*" 
038C- A5 05 2010 RORAX1 LDA AH 8088 "ROR" SHIFTS END AROUND 
O38E- 4A 2020 LSR WITHOUT LEAVING A BIT IN CARRY 
O38F- 66 04 2030 ROR AL 
0391- 90 02 2040 BCC .1 6502 DOES LEAVE A BIT IN CARRY, 
0393- 09 80 2050 ORA #$80 SO LETS MERGE CARRY IN HERE. 
0395- 85 05 2060 .1 STA AH 
0397- 60 a. P RTS 
Sa # SIMULATE 8088 "EOR DX, AX" 
0398- A5 O4 2110 EORAD LDA AL 
O39A- 45 OA 2120 
039C- 85 OA Siee STA DL 
039E- 2 05 2140 LDA AH 
O3A0- 45 OB 2150 EOR DH 
O3A2- 85 OB 2160 STA DH 
O3A4~ 60 2170 RTS 
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